home *** CD-ROM | disk | FTP | other *** search
- ; **** Installscript written by Markus Mönig ****
-
- ; **** Special version for MainActor Broadcast ****
- ; **** by MainConcept, GbR Moenig/Zabel, © 1994, 1995 ****
-
- ; **** This script requires the Installer from Commodore ****
- ; **** which is available for free. ****
-
- ; **** Version 1.0 of this script ****
-
- (set ProductName "MABroadcast Patch") ; product Name
- (set VersionNum "1.01") ; product version number
- (set OldVersionNum "1.00") ; product version number
-
- (set MABName "MABroadcast")
- (set DefaultMAB @default-dest)
-
- (set OSVersion (/ (getversion) 65536))
- (set WBVersion (/ (getversion "version.library" (resident)) 65536))
- (set MVBNum (getversion "MABroadcast:MVBroadcast"))
- (set MVBVer (/ MVBNum 65536))
- (set MVBRev (- MVBNum (* MABVer 65536)))
-
- (set @default-dest "MABroadcast:")
-
- (transcript "Installing %s Commodity..." ProductName)
-
- (set WrongVersion
- ("%s%s%s"
- "You dont have MainActor Broadcast v"
- OldVersionNum
- "\ninstalled !"
- )
- )
-
- ; Here follow localized strings for the german and english texts
- ; used in the script. Adding a new language should be easy by copying
- ; the block and translating it.
-
- (complete 10)
-
- ( if (AND (= MVBVer 0) (= MVBRev 20) )
- (
- (working "Patching FLI Saver")
- (run ("patcher MABroadcast:Saver/FLI MABroadcast:Saver/FLI patch/FLI"))
-
- (working "Patching FLC Saver")
- (run ("patcher MABroadcast:Saver/FLC MABroadcast:Saver/FLC patch/FLC"))
-
- (working "Patching MED Player")
- (run ("patcher MABroadcast:Sound/MED MABroadcast:Sound/MED patch/MED"))
-
- (working "Patching OctaMED Player")
- (run ("patcher MABroadcast:Sound/OctaMED MABroadcast:Sound/OctaMED patch/OctaMED"))
-
- (working "Patching IFF-8SVX Player")
- (run ("patcher MABroadcast:Sound/IFF-8SVX MABroadcast:Sound/IFF-8SVX patch/IFF-8SVX"))
-
- (working "Patching RIFF-WAV Player")
- (run ("patcher MABroadcast:Sound/RIFF-WAV MABroadcast:Sound/RIFF-WAV patch/RIFF-WAV"))
-
- (working "Creating AIFF Player")
- (run ("patcher MABroadcast:Sound/RIFF-WAV MABroadcast:Sound/AIFF patch/AIFF"))
-
- (working "Patching General Support Module")
- (run ("patcher MABroadcast:Support/General MABroadcast:Support/General patch/general"))
-
- (working "Patching IFF-Anim3 Loader")
- (run ("patcher MABroadcast:Loader/IFF-Anim3 MABroadcast:Loader/IFF-Anim3 patch/IFF-Anim3"))
-
- (working "Patching IFF-Anim5 Loader")
- (run ("patcher MABroadcast:Loader/IFF-Anim5 MABroadcast:Loader/IFF-Anim5 patch/IFF-Anim5"))
-
- (working "Patching IFF-Anim7_16 Loader")
- (run ("patcher MABroadcast:Loader/IFF-Anim7_16 MABroadcast:Loader/IFF-Anim7_16 patch/IFF-Anim7_16"))
-
- (working "Patching IFF-Anim7_32 Loader")
- (run ("patcher MABroadcast:Loader/IFF-Anim7_32 MABroadcast:Loader/IFF-Anim7_32 patch/IFF-Anim7_32"))
-
- (working "Patching IFF-Anim8_16 Loader")
- (run ("patcher MABroadcast:Loader/IFF-Anim8_16 MABroadcast:Loader/IFF-Anim8_16 patch/IFF-Anim8_16"))
-
- (working "Patching IFF-Anim8_32 Loader")
- (run ("patcher MABroadcast:Loader/IFF-Anim8_32 MABroadcast:Loader/IFF-Anim8_32 patch/IFF-Anim8_32"))
-
- (working "Patching IFF-AnimBrush Loader")
- (run ("patcher MABroadcast:Loader/IFF-AnimBrush MABroadcast:Loader/IFF-AnimBrush patch/IFF-AnimBrush"))
-
- (working "Patching IFF-AnimJ Loader")
- (run ("patcher MABroadcast:Loader/IFF-AnimJ MABroadcast:Loader/IFF-AnimJ patch/IFF-AnimJ"))
-
- (working "Patching MainView Broadcast")
- (run ("patcher MABroadcast:MVBroadcast MABroadcast:MVBroadcast patch/MVBroadcast"))
-
- (working "Patching MainActor Broadcast")
- (run ("patcher MABroadcast:MABroadcast MABroadcast:MABroadcast patch/MABroadcast"))
- (exit)
- )
- (
- (abort WrongVersion)
- )
- )
-
- (complete 95)
-